home *** CD-ROM | disk | FTP | other *** search
Wrap
# reload the system clock from the battery backed clock, which keeps # better time on my machine. 45 5 * * * bin:FixClock ############################################################################## # do gongs on the hour -- got annoying so have turned it off... #0 * * * * :REXX ChimeHour :NOLOG ############################################################################## # outgoing uucico jobs 30 * * * * :REXX UUio all :NOLOG 0 0,6,11,17 * * * :REXX UUio clout 0 5,22 * * * :REXX UUio chinet ############################################################################## # handle jobs related to BMS. BMS does its own locking internally # so we don't have to worry about BMS jobs colliding with themselves. # however, we use the "z" job queue to sequence the copying of the # database to a backup file before running BMS cleanup. 15,45 * * * * BMS batch :NOLOG :PRI -5 0 4 * * * :REXX BMS:bms-update force 0 3 * * 0 copy BMS:BMS.DB BMS:BMS.DB.old :OBEYQUEUE z 0 3 * * 0 BMS cleanup :MAILUSER bms-manager :OBEYQUEUE z ############################################################################## # generate a dummy control file for AmigaNet so that we will keep # retrying the connection until we get it (the number is often # busy) 55 4 * * * UUCP:c/MakeAmigaNetDummy ############################################################################## # rebuild our find database 45 4 * * * bin:UpdateDB :PRI -5 ############################################################################## # we do an incremental backup every day. Note that ReadArgs() eats the = # character we need in the config= portion of the command line. To prevent # this from happening, we quote the configuration file argument and escape # the = sign. If we didn't, CyberCron would start the job with the # argument "config SYS:Am..." instead of the necessary "config=SYS:Am...". 0 12 * * * SYS:Ami-Back/Ami-Back20 "config*=SYS:Ami-Back/Incremental.config" nowindows ############################################################################## # rebuild our pathalias database from the uucp maps # while it is highly unlikely that this would run at the same time # ScanForMaps is running, we still specify the "n" (for news) job # queue to prevent this from ever happening. If we change the times # we run any of this stuff at, we won't have to worry about collisions # then, either, by taking care of it now. # note that the pipes rely on WShell. #0 14 * * 0 type uumaps:d.#? uumaps:u.#? | pathalias -i | makedb :OBEYQUEUE n :PRI -5 :CUSTOMSH WShell ############################################################################## # handle various news jobs. Check if we got any maps in and move them into # uumaps: if we did. Batch news up and run trimnews. All this is done # under the "n" (for news) job queue to insure sequencing so that one job # doesn't start walking on top of the previous job (like trimnews and # batchnews running at the same time). 0 9 * * * :REXX ScanForMaps :OBEYQUEUE n 20 1,3,5,7,9,11,13,15,17,19,21,23 * * * UUCP:c/BatchNews :OBEYQUEUE n :PRI -5 0 10 * * * UUCP:c/trimnews :OBEYQUEUE n :PRI -5 ############################################################################## # TurboText likes to save .info files with everything it writes out. # Whenever we write mail or news, though, the file that gets edited # is in t:. When we save, we save a .info file with it. Since dmail # or GRn or whatever comes along and runs sendmail/postnews on the # temp file and then deletes it, we are left with a lone .info file # sitting in t:. Do this enough and you have a bunch of .info files # sitting in t:. So we have a cron entry to blow them away periodically. 0 * * * * Delete T:#?.info force :NOLOG ############################################################################## # build a node report for the previous week and then trim the xferstat log. # we use the "r" (for report) queue to synchronize this so the trim # doesn't stomp on the report generator. 0 0 * * 0 UUCP:c/uuacct -d7 :MAILUSER root :OBEYQUEUE r :PRI -5 0 0 * * 0 UUCP:c/trimfile UUSPOOL:XferStat -30 :OBEYQUEUE r :PRI -5 ############################################################################## # trim some of our logfiles 45 21 * * * UUCP:c/trimfile T:CronLog T:SpooldLog -100 :PRI -5 45 3 * * 0 UUCP:c/trimfile TERM:term.logfile JRCOMM:jrcomm.log EMPIRE:empire.log IMPERIUM:Data/imperium.log -75 :PRI -5 ############################################################################## # here we have a bunch of events that send x10 commands out to control # things around the house. # Turn the kitchen light on at night and off in the morning 0,30 18 * * * CyberX10 unit 8 on d2 0 9,10,12,14,16 * * * CyberX10 unit 8 off d2 :NOLOG # Turn the dining room light out periodically 0,15,30,45 1-6 * * * CyberX10 unit 8 off d1 :NOLOG 0,30 10-17 * * * CyberX10 unit 8 off d1 :NOLOG # turn the kid's bathroom light out periodically 0,15,30,45 1-6,10-16,19-20 * * * CyberX10 unit 8 off e2 :NOLOG # deal with the front entrance light 0 20 * * * CyberX10 unit 8 on e1 0,30 0-19,23 * * * CyberX10 unit 8 off e1 :NOLOG # make sure my lights go out after I've left in the morning 0 8,9 * * 1-3,5 CyberX10 unit8 off c1 c2 0 10,11 * * 4 CyberX10 unit8 off c1 c2 0 9,10 * * 6 CyberX10 unit8 off c1 c2 0 12,13 * * 0 CyberX10 unit8 off c1 c2 # make sure the AT&T terminal doesn't accidentally get left on. we use # an ARexx string command here to check for an ARexx clip variable that # can override this. # # note that ReadArgs() stops parsing the line when it sees a ; character. # this presents a problem, since we need to use ; to delimit statements in # the ARexx string command. The solution is to quote the entire command # and use * to escape the ; characters. 0 * * * * :REXX "`options results*; stat = getclip('AT&T_TERMINAL_RESET')*; if stat ~= '' then exit*; address command 'CyberX10 unit 8 off c16'" :NOLOG ############################################################################## # wake me up in the morning 15-59 7 * * 1-3,5 :REXX PlaySound :NOLOG :NAME MonTueWedFri 0 8 * * 1-3,5 :REXX `setclip(NOSOUND) :NAME MonTueWedFri-Reset 15-59 9 * * 4 :REXX PlaySound :NOLOG :NAME Thu 0 10 * * 4 :REXX `setclip(NOSOUND) :NAME Thu-Reset 15-59 8 * * 6 :REXX PlaySound :NOLOG :NAME Sat 0 9 * * 6 :REXX `setclip(NOSOUND) :NAME Sat-Reset 0-45 11 * * 0 :REXX PlaySound :NOLOG :NAME Sun 46 11 * * 0 :REXX `setclip(NOSOUND) :NAME Sun-Reset